-- card: 5581 from stack: in
-- bmap block id: 5653
-- flags: 0000
-- background id: 5133
-- name: cursor
----- HyperTalk script -----
on idle
  --This script uses the poke XCMD. You should not use this
  --XCMD unless you are certain of what you are doing, and then
  --you should still think twice about it.

  put the mouseloc into temp
  put item 1 of temp into hor
  put item 2 of temp into vert
  -- the reflecting field
  if (hor>150) and (hor<357) and (vert>94) and (vert<205) then
    poke "82A","0060"
    poke "8CE","FF"
  end if
  --Cursor wrap
  if hor>508 then poke "82A","0008"

  if hor < 3 then poke "82A","01F0"

  if vert>340 then poke "828","0008"

  if vert<3 then poke "828","150"

end idle





-- part 1 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=29 top=231 right=275 bottom=77
-- title width / last selected line: 0
-- icon id / first selected line: 30557 / 30557
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Options
----- HyperTalk script -----
on mouseUp
  visual effect iris close slowly
  go card "options"
end mouseUp



-- part contents for background part 1
----- text -----